! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Stoichiometric Data Structures File
! 
! Generated by KPP-2.2.3 symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : aromatics_kpp_StoichiomSP.f90
! Time                 : Mon Nov 23 18:18:23 2020
! Working directory    : /n/home08/kbates/Aromatics/CRI
! Equation file        : aromatics_kpp.kpp
! Output root filename : aromatics_kpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE aromatics_kpp_StoichiomSP

  USE aromatics_kpp_Precision
  PUBLIC
  SAVE


! Row-compressed sparse data for the Jacobian of reaction products JVRP

  INTEGER, PARAMETER, DIMENSION(360) :: CROW_JVRP_0 = (/ &
       1,  2,  4,  6,  8, 10, 11, 13, 15, 16, 18, 20, &
      22, 23, 25, 27, 29, 31, 33, 34, 36, 38, 40, 42, &
      44, 46, 48, 50, 52, 53, 54, 55, 56, 57, 58, 59, &
      60, 61, 62, 63, 64, 65, 67, 69, 71, 72, 73, 75, &
      76, 78, 80, 82, 84, 86, 88, 89, 90, 91, 92, 93, &
      95, 97, 99,100,101,103,105,107,108,110,112,114, &
     116,118,120,121,122,123,124,125,127,129,131,133, &
     135,137,139,141,143,145,147,149,151,153,155,157, &
     159,161,163,164,166,168,170,172,174,176,178,180, &
     182,184,186,188,190,192,193,195,197,198,200,202, &
     204,206,208,210,212,214,216,218,220,222,224,226, &
     228,230,232,234,235,237,239,241,243,245,247,248, &
     250,252,253,254,256,258,260,262,264,266,268,270, &
     272,274,276,278,280,282,284,286,288,290,292,294, &
     296,298,300,302,304,305,307,309,311,313,315,317, &
     319,321,323,324,325,327,329,331,333,335,337,339, &
     341,343,345,347,349,351,353,355,357,359,361,363, &
     365,367,369,371,373,375,377,379,381,383,385,387, &
     389,391,393,395,397,399,401,403,405,407,409,411, &
     413,415,417,419,421,423,425,427,429,431,433,435, &
     437,439,441,443,445,447,449,451,453,455,457,459, &
     461,462,464,466,468,470,472,474,475,477,479,481, &
     483,485,487,489,491,493,495,497,499,501,503,505, &
     507,509,511,513,515,517,519,521,523,525,527,529, &
     531,533,535,537,539,541,543,545,547,549,551,553, &
     555,557,559,561,563,565,567,569,571,572,574,576, &
     578,580,582,584,586,588,590,592,594,596,598,600, &
     601,602,604,606,608,609,610,612,614,616,617,619, &
     621,623,624,626,628,630,631,632,634,636,638,639, &
     640,642,644,646,647,648,650,652,654,656,658,660 /)
  INTEGER, PARAMETER, DIMENSION(360) :: CROW_JVRP_1 = (/ &
     661,662,663,664,665,666,667,668,669,670,671,672, &
     673,674,675,676,677,678,679,680,681,682,683,684, &
     685,686,687,688,689,690,691,692,693,694,695,696, &
     697,698,699,700,701,702,703,704,705,706,707,707, &
     707,707,707,707,707,707,707,709,711,713,715,717, &
     718,720,722,724,726,728,730,731,732,734,736,738, &
     740,742,744,746,748,749,751,753,755,757,758,760, &
     762,764,766,767,769,771,773,774,776,777,779,781, &
     782,783,785,787,788,790,791,793,795,796,797,799, &
     801,802,804,805,807,809,810,811,813,814,816,818, &
     820,821,822,824,826,827,829,831,833,835,837,838, &
     839,841,843,845,847,849,851,853,854,856,858,860, &
     862,863,865,867,869,871,872,874,875,877,878,880, &
     882,884,885,887,889,890,892,893,895,896,897,899, &
     900,901,903,904,906,908,909,911,913,914,915,917, &
     919,921,923,924,926,928,930,932,934,935,937,939, &
     940,942,943,945,947,949,950,952,954,955,957,958, &
     960,961,963,965,967,968,970,972,973,975,977,979, &
     980,982,983,985,987,988,990,992,993,995,997,999, &
     1001,1002,1004,1006,1007,1009,1010,1011,1012,1013,1014,1015, &
     1016,1017,1018,1019,1020,1021,1022,1023,1024,1025,1026,1027, &
     1028,1029,1030,1031,1032,1033,1034,1035,1036,1037,1038,1039, &
     1040,1041,1042,1043,1044,1045,1046,1047,1048,1049,1050,1051, &
     1052,1053,1054,1055,1056,1057,1058,1059,1060,1061,1062,1063, &
     1064,1065,1066,1067,1068,1069,1070,1071,1072,1073,1074,1075, &
     1076,1077,1078,1079,1080,1081,1082,1083,1084,1085,1086,1087, &
     1088,1089,1090,1091,1092,1093,1094,1095,1096,1097,1098,1099, &
     1100,1101,1102,1103,1104,1105,1106,1107,1108,1109,1110,1111, &
     1112,1113,1114,1115,1116,1117,1118,1119,1120,1121,1122,1123, &
     1124,1125,1126,1127,1128,1129,1130,1131,1132,1133,1134,1135 /)
  INTEGER, PARAMETER, DIMENSION(75) :: CROW_JVRP_2 = (/ &
     1136,1137,1138,1139,1140,1141,1142,1143,1144,1145,1146,1147, &
     1148,1149,1150,1151,1152,1153,1154,1155,1156,1157,1158,1159, &
     1160,1161,1162,1163,1164,1165,1166,1167,1168,1169,1170,1171, &
     1172,1173,1174,1175,1176,1177,1178,1179,1180,1181,1182,1183, &
     1184,1185,1186,1187,1188,1189,1190,1191,1192,1193,1194,1195, &
     1196,1197,1198,1199,1200,1201,1202,1203,1204,1205,1206,1207, &
     1208,1209,1210 /)
  INTEGER, PARAMETER, DIMENSION(795) :: CROW_JVRP = (/&
    CROW_JVRP_0, CROW_JVRP_1, CROW_JVRP_2 /)

  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_0 = (/ &
      87, 87,198, 87,206, 87,201, 87,201, 25,198,206, &
     198,201,206,206,209,201,209,201,209, 25,198,207, &
      75,207, 89,207,198,208,207,208,208,206,207,201, &
     207,207,209,206,208,201,208, 65,207,208,209, 35, &
     207,160,207,198,198, 89,201,209,209, 35,160,209, &
      29, 65, 29, 65, 37,207,206,210,208,210,210,210, &
     201,210, 58, 61,207, 61,207,186,207,186,209,162, &
     207,202,207, 61,186,186, 58, 58, 26,207,204,206, &
     204,208,204,204,204,210,204,210,201,204, 59, 66, &
     207, 66,207,164,207,164,209,123,207, 38,207, 66, &
     164,164, 59, 59,167,204,179,204,199,204,197,204, &
     195,204,187,204,182,204,176,204,180,204,204,211, &
     204,211,204,205,204,205, 98,207, 98,207,105,207, &
     192,207,192,209,201,205, 85,205,206, 42,207,199, &
     206, 27,207, 27,207,167,206,179,206, 41,207,197, &
     206,197,206,195,206,187,206,182,206,189,206,189, &
     175,206,185,206,185,170,206,176,206,193,206,193, &
     209,184,209,169,209,169,206,169,201,169,208,163, &
     209,163,206,163,208,163,210,184,198,184,207,156, &
     206,156,208,156,210,193,180,206, 41,209,200,207, &
     154,207,191,207,201,211, 31, 60,201,181,201,136, &
     124,206,211,181,206,191,209,140,207,167,210,179, &
     210,197,208,195,208,187,208,182,208,189,208,175, &
     208,185,208,170,208,176,208,193,208,180,208,203, &
     207,199,210,203,209,197,210,195,210,187,210,182, &
     210,189,210,189,178,210,175,210,185,210,170,210, &
     176,210,193,210,180,210, 93,207,138,207,199,199, &
     199,208,167,208,179,208,205,208,208,211,181,208, &
     152,207,152,198,124,207,136,207,124,198,  4,207, &
     174,207,174,207,152,209,165,207,183,207,165,209 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_1 = (/ &
     183,209,151,207,194,207,196,207,190,207,190,207, &
     167,205,179,205,167,205,179,205,151,198,194,198, &
     196,198,151,209,196,209,196,209,210,211,181,210, &
     210,211,181,210,121,207,121,207, 91,207, 62,207, &
      63,207, 64,207, 95,207, 86,207, 90,207,112,207, &
     103,207,113,207,112,207,103,207,113,207,  6,207, &
      39,207, 40,207, 36,207,157,208,157,206,107,207, &
     104,207,108,207,108,207,117,207,117,207,173,205, &
     173,205,173,210,173,173,208,173,206,173,206, 50, &
     207, 42,209,188,198,205,205,210,205,210,197,205, &
     187,205,182,205,189,205,178,205,175,205,185,205, &
     176,205,195,205,170,205,193,205,180,205,197,205, &
     187,205,182,205,189,205,178,205,175,205,185,205, &
     195,205,170,205,193,205,180,205,176,205,199,205, &
     199,205,205,211,181,205,147,198,177,198,188,207, &
     178,206,178,206,178,208,177,207,147,207,166,206, &
     166,208,172,206,172,208,116,207,155,207,168,207, &
     133,206,133,208,133,201, 30,111,207,132,206,132, &
     206,132,208,109,207,131,206,131,206,131,208,109, &
     198,119,207,171,207,150,202,150,206,150,201,150, &
     150,144,202,144,206,144,201,144,144,122,202,122, &
     206,122,201,122,130,202,130,206,130,201,130,134, &
     202,134,206,134,201,134,134,129,202,129,206,129, &
     201,129,129,125,202,125,206,125,201,125,125,102, &
     207, 94,207,101,206,106,206,101,208,106,208,101, &
     101,192, 85,191,140,140,203,174,165,165,165,183, &
     194,194,194,196,190,121, 91, 62, 63, 64, 95, 90, &
      86,112,103,113,107,116,104,108,117,200, 50,168, &
     155,147,177,171, 98,136,119, 28, 94,184, 33,207, &
      32,207, 34,207,114,206,114,208,114,114,206,114 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_2 = (/ &
     209, 48,207, 48,209,126,206,126,208,126,126,126, &
     206,126,206,126,209,126,209, 43,207, 43,209,141, &
     206,141,208,141,141,206,141,209,145,206,145,208, &
     145,145,206,145,209,146,206,146,208,146,146,206, &
     146,209, 81,207, 81, 70,207, 70,115,207,115,207, &
     115,115, 49,201, 78,207, 78, 73,207, 73,127,207, &
     127,207,127,127, 44,201,110,207,110,100,207,100, &
     118,207,118,207,118,118, 53,207, 53, 47,207, 79, &
     207, 79,209,159,159,159,206,159,208,159,159,206, &
     159,209, 80,207, 80,209,158,206,158,158,158,208, &
     158,206,158,206,158,209,158,209,153,206,153,208, &
     153,153,206,153,209,142,206,142,208,142,142,206, &
     142,209,142,209,142,206,142,120,207,120, 84,207, &
      84, 45,207, 45,207,143,207,143,143,209, 67,207, &
      67, 56,207, 56, 92,207, 92, 92, 82,207, 82, 82, &
      99,207, 99, 52,207, 77,207, 77, 57,207, 69,207, &
      69,149,149,201,149,208,149,206,149,209,161,161, &
     206,161,208,161,206,161,209,135,208,135,135,206, &
     135,209, 83, 83,207, 54, 54,207,137,206,137,208, &
     137,137,206,137,209, 68, 68,207, 55, 55,207, 74, &
      74,207, 71,207, 96,207, 96,139,206,139,208,139, &
     139,206,139,209, 88,207, 88,148,208,148,148,206, &
     148,209, 76, 76,207, 46,207, 46,128,206,128,208, &
     128,209,128,206,128, 51,207, 72,207, 72, 97,207, &
      97,167,140,154,192, 41,187, 98,176,  1, 42, 27, &
     186,150,129,202,  2,  3, 28,111,101,132, 93,119, &
     199, 62,125,174,165, 89,190,102,188,178,105, 35, &
     160, 65,208, 94,106,107, 39, 40, 36,157,  4, 60, &
     193,121,136,184,  5,169,163,156,116,151,147,172, &
     177,166,182,  6,196,168,133,144,170,117,173, 50 /)
  INTEGER, PARAMETER, DIMENSION(129) :: ICOL_JVRP_3 = (/ &
       7,  8,205,203,134,183,130,109,131,210, 61, 58, &
     185,108,194,155,122, 29,181,206,201,209,124, 25, &
     198,207, 85, 30,  9,179, 90, 31,180,152, 91,171, &
      10,195,200,197, 95, 63, 64,191,211,189,112,103, &
     113,138, 86,175,104, 37, 11, 75, 12,162, 87, 13, &
      26, 38,164,204, 66, 59,123, 32, 33, 34,153, 76, &
      96, 51,141, 67,149,158,135, 68,145, 43, 77, 92, &
      78, 45,114, 97,120, 46, 52,161, 69, 70,126,148, &
      71,137, 47,128, 72, 48, 79, 80,159,118,127, 99, &
      53, 81, 44, 49,110, 82,139,115, 54, 73,143,146, &
     100, 83, 88, 55, 84,142, 74, 56, 57 /)
  INTEGER, PARAMETER, DIMENSION(1209) :: ICOL_JVRP = (/&
    ICOL_JVRP_0, ICOL_JVRP_1, ICOL_JVRP_2, ICOL_JVRP_3 /)

  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_0 = (/ &
       1,  2,  2,  3,  3,  4,  4,  5,  5,  6,  7,  7, &
       8,  8,  9, 10, 10, 11, 11, 12, 12, 13, 14, 14, &
      15, 15, 16, 16, 17, 17, 18, 18, 19, 20, 20, 21, &
      21, 22, 22, 23, 23, 24, 24, 25, 25, 26, 26, 27, &
      27, 28, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, &
      38, 39, 40, 41, 42, 42, 43, 43, 44, 44, 45, 46, &
      47, 47, 48, 49, 49, 50, 50, 51, 51, 52, 52, 53, &
      53, 54, 54, 55, 56, 57, 58, 59, 60, 60, 61, 61, &
      62, 62, 63, 64, 65, 65, 66, 66, 67, 67, 68, 69, &
      69, 70, 70, 71, 71, 72, 72, 73, 73, 74, 74, 75, &
      76, 77, 78, 79, 80, 80, 81, 81, 82, 82, 83, 83, &
      84, 84, 85, 85, 86, 86, 87, 87, 88, 88, 89, 89, &
      90, 90, 91, 91, 92, 92, 93, 93, 94, 94, 95, 95, &
      96, 96, 97, 97, 98, 98, 99,100,100,101,101,102, &
     102,103,103,104,104,105,105,106,106,107,107,108, &
     108,109,109,110,110,111,111,112,112,113,113,114, &
     115,115,116,116,117,118,118,119,119,120,120,121, &
     121,122,122,123,123,124,124,125,125,126,126,127, &
     127,128,128,129,129,130,130,131,131,132,132,133, &
     133,134,134,135,135,136,137,137,138,138,139,139, &
     140,140,141,141,142,142,143,144,144,145,145,146, &
     147,148,148,149,149,150,150,151,151,152,152,153, &
     153,154,154,155,155,156,156,157,157,158,158,159, &
     159,160,160,161,161,162,162,163,163,164,164,165, &
     165,166,166,167,167,168,168,169,169,170,170,171, &
     171,172,172,173,174,174,175,175,176,176,177,177, &
     178,178,179,179,180,180,181,181,182,182,183,184, &
     185,185,186,186,187,187,188,188,189,189,190,190, &
     191,191,192,192,193,193,194,194,195,195,196,196, &
     197,197,198,198,199,199,200,200,201,201,202,202 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_1 = (/ &
     203,203,204,204,205,205,206,206,207,207,208,208, &
     209,209,210,210,211,211,212,212,213,213,214,214, &
     215,215,216,216,217,217,218,218,219,219,220,220, &
     221,221,222,222,223,223,224,224,225,225,226,226, &
     227,227,228,228,229,229,230,230,231,231,232,232, &
     233,233,234,234,235,235,236,236,237,237,238,238, &
     239,239,240,240,241,241,242,242,243,243,244,244, &
     245,245,246,246,247,247,248,248,249,249,250,250, &
     251,251,252,252,253,254,254,255,255,256,256,257, &
     257,258,258,259,259,260,261,261,262,262,263,263, &
     264,264,265,265,266,266,267,267,268,268,269,269, &
     270,270,271,271,272,272,273,273,274,274,275,275, &
     276,276,277,277,278,278,279,279,280,280,281,281, &
     282,282,283,283,284,284,285,285,286,286,287,287, &
     288,288,289,289,290,290,291,291,292,292,293,293, &
     294,294,295,295,296,296,297,297,298,298,299,299, &
     300,300,301,301,302,302,303,303,304,304,305,305, &
     306,306,307,307,308,308,309,310,310,311,311,312, &
     312,313,313,314,314,315,315,316,316,317,317,318, &
     318,319,319,320,320,321,321,322,322,323,323,324, &
     325,326,326,327,327,328,328,329,330,331,331,332, &
     332,333,333,334,335,335,336,336,337,337,338,339, &
     339,340,340,341,341,342,343,344,344,345,345,346, &
     346,347,348,349,349,350,350,351,351,352,353,354, &
     354,355,355,356,356,357,357,358,358,359,359,360, &
     361,362,363,364,365,366,367,368,369,370,371,372, &
     373,374,375,376,377,378,379,380,381,382,383,384, &
     385,386,387,388,389,390,391,392,393,394,395,396, &
     397,398,399,400,401,402,403,404,405,406,415,415, &
     416,416,417,417,418,418,419,419,420,421,421,422 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_2 = (/ &
     422,423,423,424,424,425,425,426,426,427,428,429, &
     429,430,430,431,431,432,432,433,433,434,434,435, &
     435,436,436,437,438,438,439,439,440,440,441,441, &
     442,443,443,444,444,445,445,446,446,447,448,448, &
     449,449,450,450,451,452,452,453,454,454,455,455, &
     456,457,458,458,459,459,460,461,461,462,463,463, &
     464,464,465,466,467,467,468,468,469,470,470,471, &
     472,472,473,473,474,475,476,476,477,478,478,479, &
     479,480,480,481,482,483,483,484,484,485,486,486, &
     487,487,488,488,489,489,490,490,491,492,493,493, &
     494,494,495,495,496,496,497,497,498,498,499,499, &
     500,501,501,502,502,503,503,504,504,505,506,506, &
     507,507,508,508,509,509,510,511,511,512,513,513, &
     514,515,515,516,516,517,517,518,519,519,520,520, &
     521,522,522,523,524,524,525,526,527,527,528,529, &
     530,530,531,532,532,533,533,534,535,535,536,536, &
     537,538,539,539,540,540,541,541,542,542,543,544, &
     544,545,545,546,546,547,547,548,548,549,550,550, &
     551,551,552,553,553,554,555,555,556,556,557,557, &
     558,559,559,560,560,561,562,562,563,564,564,565, &
     566,566,567,567,568,568,569,570,570,571,571,572, &
     573,573,574,574,575,575,576,577,577,578,579,579, &
     580,580,581,582,582,583,583,584,585,585,586,586, &
     587,587,588,588,589,590,590,591,591,592,593,593, &
     594,595,596,597,598,599,600,601,602,603,604,605, &
     606,607,608,609,610,611,612,613,614,615,616,617, &
     618,619,620,621,622,623,624,625,626,627,628,629, &
     630,631,632,633,634,635,636,637,638,639,640,641, &
     642,643,644,645,646,647,648,649,650,651,652,653, &
     654,655,656,657,658,659,660,661,662,663,664,665 /)
  INTEGER, PARAMETER, DIMENSION(129) :: IROW_JVRP_3 = (/ &
     666,667,668,669,670,671,672,673,674,675,676,677, &
     678,679,680,681,682,683,684,685,686,687,688,689, &
     690,691,692,693,694,695,696,697,698,699,700,701, &
     702,703,704,705,706,707,708,709,710,711,712,713, &
     714,715,716,717,718,719,720,721,722,723,724,725, &
     726,727,728,729,730,731,732,733,734,735,736,737, &
     738,739,740,741,742,743,744,745,746,747,748,749, &
     750,751,752,753,754,755,756,757,758,759,760,761, &
     762,763,764,765,766,767,768,769,770,771,772,773, &
     774,775,776,777,778,779,780,781,782,783,784,785, &
     786,787,788,789,790,791,792,793,794 /)
  INTEGER, PARAMETER, DIMENSION(1209) :: IROW_JVRP = (/&
    IROW_JVRP_0, IROW_JVRP_1, IROW_JVRP_2, IROW_JVRP_3 /)



!  Stoichiometric Matrix in Compressed Column Sparse Format


  INTEGER, PARAMETER, DIMENSION(360) :: CCOL_STOICM_0 = (/ &
       1,  3,  5,  8, 11, 14, 16, 19, 22, 24, 27, 29, &
      32, 34, 37, 40, 43, 46, 48, 50, 53, 56, 60, 64, &
      67, 70, 74, 77, 80, 82, 84, 86, 89, 91, 94, 97, &
     100,102,105,110,113,116,119,124,127,130,133,136, &
     139,142,144,149,154,158,162,166,170,174,178,181, &
     184,189,192,195,198,204,209,212,215,218,220,224, &
     229,233,237,241,244,247,251,254,261,271,278,292, &
     303,312,321,328,338,343,347,352,356,359,362,366, &
     372,376,379,382,387,390,395,398,401,406,412,415, &
     427,430,436,441,447,458,461,470,479,483,491,496, &
     505,514,519,526,533,537,544,550,556,560,569,577, &
     581,587,591,599,608,613,617,620,624,627,630,633, &
     636,639,642,645,649,657,661,664,671,680,683,686, &
     692,698,707,717,720,729,732,735,738,741,748,752, &
     765,775,784,793,802,810,822,832,840,849,856,867, &
     876,880,884,887,890,893,896,899,906,913,921,924, &
     935,940,949,954,955,964,967,970,974,978,983,988, &
     992,995,999,1004,1010,1015,1021,1025,1030,1045,1056,1066, &
     1070,1073,1081,1086,1091,1095,1099,1102,1106,1110,1114,1118, &
     1122,1126,1129,1133,1138,1143,1148,1154,1157,1162,1163,1166, &
     1169,1172,1184,1198,1202,1206,1209,1212,1215,1218,1224,1228, &
     1236,1240,1245,1251,1254,1257,1261,1272,1274,1277,1281,1292, &
     1295,1298,1308,1320,1327,1335,1340,1348,1358,1368,1374,1378, &
     1383,1387,1391,1395,1399,1403,1408,1413,1418,1423,1427,1432, &
     1436,1440,1443,1455,1470,1473,1485,1488,1494,1499,1505,1518, &
     1529,1539,1549,1554,1561,1564,1574,1585,1588,1591,1597,1605, &
     1608,1616,1619,1625,1628,1634,1640,1645,1650,1653,1657,1661, &
     1664,1666,1669,1673,1677,1679,1682,1685,1689,1693,1696,1699, &
     1703,1707,1710,1713,1717,1721,1724,1727,1730,1734,1738,1741, &
     1743,1746,1750,1754,1757,1759,1766,1775,1781,1787,1790,1793 /)
  INTEGER, PARAMETER, DIMENSION(360) :: CCOL_STOICM_1 = (/ &
     1797,1799,1804,1809,1813,1816,1819,1824,1830,1833,1836,1839, &
     1843,1846,1851,1854,1859,1863,1868,1873,1877,1881,1885,1889, &
     1894,1898,1906,1914,1922,1930,1935,1942,1948,1952,1963,1966, &
     1973,1977,1981,1985,1990,1994,2001,2006,2010,2018,2026,2027, &
     2028,2029,2030,2031,2032,2033,2034,2041,2048,2054,2057,2060, &
     2066,2074,2082,2085,2089,2092,2095,2101,2107,2115,2123,2131, &
     2139,2142,2146,2149,2152,2158,2166,2174,2177,2180,2186,2194, &
     2202,2205,2208,2214,2222,2230,2237,2244,2249,2256,2259,2263, &
     2266,2269,2272,2279,2286,2291,2298,2301,2305,2308,2312,2315, &
     2322,2329,2334,2341,2344,2348,2351,2355,2358,2360,2363,2367, &
     2372,2374,2376,2379,2382,2385,2390,2395,2399,2404,2407,2410, &
     2413,2416,2421,2426,2431,2436,2439,2442,2446,2452,2458,2461, &
     2464,2467,2472,2477,2482,2487,2490,2493,2497,2500,2504,2507, &
     2511,2514,2518,2522,2526,2530,2532,2536,2540,2544,2548,2550, &
     2554,2558,2561,2564,2568,2570,2575,2579,2581,2585,2587,2590, &
     2593,2597,2601,2603,2606,2609,2613,2617,2620,2623,2628,2633, &
     2636,2641,2644,2647,2650,2653,2656,2661,2666,2669,2673,2676, &
     2678,2681,2684,2688,2690,2695,2698,2701,2705,2711,2717,2720, &
     2723,2726,2729,2734,2739,2742,2744,2747,2750,2753,2756,2761, &
     2766,2769,2773,2775,2779,2784,2788,2789,2790,2791,2792,2793, &
     2794,2795,2796,2797,2798,2799,2801,2802,2803,2804,2805,2806, &
     2807,2808,2809,2810,2811,2812,2813,2814,2815,2816,2817,2818, &
     2819,2820,2821,2822,2823,2824,2825,2826,2827,2828,2829,2830, &
     2831,2832,2833,2834,2835,2836,2837,2838,2839,2840,2841,2842, &
     2843,2844,2845,2846,2847,2848,2849,2850,2851,2852,2853,2854, &
     2855,2856,2857,2858,2859,2860,2861,2862,2863,2864,2865,2866, &
     2867,2868,2869,2870,2871,2872,2873,2874,2875,2876,2877,2878, &
     2879,2880,2881,2882,2883,2884,2885,2886,2887,2888,2889,2890, &
     2891,2892,2893,2894,2895,2896,2897,2898,2899,2900,2901,2902, &
     2903,2904,2905,2906,2907,2908,2909,2910,2911,2912,2913,2914 /)
  INTEGER, PARAMETER, DIMENSION(75) :: CCOL_STOICM_2 = (/ &
     2915,2916,2917,2918,2919,2920,2921,2922,2923,2924,2925,2926, &
     2927,2928,2929,2930,2931,2932,2933,2934,2935,2936,2937,2938, &
     2939,2940,2941,2942,2943,2944,2945,2946,2947,2948,2949,2950, &
     2951,2952,2953,2954,2955,2956,2957,2958,2959,2960,2961,2962, &
     2963,2964,2965,2966,2967,2968,2969,2970,2971,2972,2973,2974, &
     2975,2976,2977,2978,2979,2980,2981,2982,2983,2984,2985,2986, &
     2987,2988,2989 /)
  INTEGER, PARAMETER, DIMENSION(795) :: CCOL_STOICM = (/&
    CCOL_STOICM_0, CCOL_STOICM_1, CCOL_STOICM_2 /)

  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_0 = (/ &
      87,198, 87,198, 87,201,206, 87,201,206, 87,201, &
     209, 25, 87,198,201,206,198,201,209,201,206,201, &
     206,209,206,209, 29,201,209, 25,207,198,207,208, &
      75,207,208, 89,207,208,198,207,208,207,208, 89, &
     208, 35,206,207,160,201,207,201,207,208,209,201, &
     206,207,208, 65,201,208, 65,201,207,201,207,208, &
     209, 35,201,207,160,207,209, 25,198, 87,198, 89, &
     207, 87,201,206,206,209, 87,201,209, 35,206,207, &
     160,201,207,201,209, 29,201,209, 65,201,207,208, &
     209, 29,201,209, 65,201,208, 37,207,210,186,201, &
     206,208,210, 61,208,210,162,186,210,186,208,210, &
      58,201,210, 58,201,210, 61,207,210, 61,186, 19, &
     186,202,207,208,160,186,202,208,209,162,186,207, &
     208,  2,202,207,208, 61,186,207,208, 19,186,202, &
     208, 19, 75,186,202, 58,186,208,209, 58,201,210, &
      26,204,207,164,201,204,206,208, 66,204,208,123, &
     164,204,164,204,208,123,162,164,186,204,210,164, &
     186,204,208,210, 59,201,204, 59,201,204, 66,204, &
     207, 66,164, 38,164,207,208, 38,160,164,208,209, &
     123,164,207,208,  2, 38,207,208, 66,164,207,208, &
      38,164,208, 38, 75,164, 59,164,208,209, 59,201, &
     204,123,138,164,167,191,204,208,123,138,164,179, &
     186,190,191,192,204,208, 93,123,164,192,199,204, &
     208,123,138,140,164,167,176,191,192,197,199,203, &
     204,208,210,123,138,164,186,191,192,195,197,201, &
     204,208, 20,123,164,183,187,190,204,205,208,123, &
     138,164,182,192,203,204,205,208,123,138,140,164, &
     176,204,208,123,138,164,180,186,191,192,201,204, &
     208,164,199,204,208,211, 13,164,204,211,164,204, &
     205,208,210,154,164,204,205, 98,187,207, 20, 98 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_1 = (/ &
     183,  2,105,207,208,186,192,202,205,207,208,160, &
     192,205,209, 85,201,205, 85,201,205,  2,201,205, &
     206,210, 42,199,207,192,199,201,206,208, 27,176, &
     207, 27,167,207,167,191,201,206,208,179,186,192, &
     201,206,208, 41,197,207,140,167,176,191,192,197, &
     199,201,203,206,208,210,197,200,206,186,191,192, &
     195,201,206,186,187,201,205,206,182,192,200,201, &
     205,206,132,147,177,186,188,189,194,196,201,206, &
     208, 94,101,189,155,174,175,183,186,201,205,206, &
     208,168,183,185,186,190,201,202,206,208,185,190, &
     202,207,170,171,183,186,201,202,206,207,140,176, &
     201,206,208,184,186,188,193,194,196,201,206,208, &
     184,186,188,193,194,196,201,208,209,160,163,169, &
     184,209,  5,169,171,201,202,208,209,  5,169,171, &
     201,202,206,208,  5,136,169,201,  5, 13, 86,169, &
     198,201,208,  5,163,165,171,201,209,  5,163,165, &
     171,201,206,  5,121,163,208,  5,162,163,165,171, &
     186,201,208,210,162,165,171,184,186,198,201,208, &
     156,169,184,207,  5,156,165,171,206,208,  5,121, &
     156,208,  5,156,162,165,171,186,208,210,177,184, &
     186,188,193,194,196,201,208,180,186,192,201,206, &
      41,160,197,209,195,200,207,  2,154,207,210,191, &
     207,211, 31,201,211, 31,201,211, 60,136,201,124, &
     181,201, 60,136,201,124,181,201,199,201,206,211, &
       2,181,186,201,202,205,206,210,160,191,209,211, &
     140,187,207,138,162,167,186,191,208,210,138,162, &
     179,186,190,191,192,208,210, 95,197,208,195,200, &
     208, 98,186,187,205,207,208, 98,182,192,205,207, &
     208,103,112,113,186,189,194,196,207,208,104,174, &
     175,183,186,191,203,205,207,208,108,185,208,117 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_2 = (/ &
     170,171,183,186,201,202,207,208, 64,176,208,121, &
     193,208, 91,180,208,182,203,207, 93,162,186,192, &
     199,208,210,160,182,203,209,138,140,162,167,176, &
     186,191,192,197,199,203,208,210,138,162,186,191, &
     192,195,197,201,208,210, 20,162,183,186,187,190, &
     205,208,210,138,162,182,186,192,203,205,208,210, &
     138,162,186,188,189,194,196,208,210,132,186,188, &
     189,194,196,202,208, 75,138,162,174,178,183,186, &
     190,202,203,208,210,138,162,174,175,183,186,203, &
     205,208,210,138,183,185,186,190,202,208,210,170, &
     171,183,186,200,201,202,208,210,138,140,162,176, &
     186,208,210,162,177,184,186,188,193,194,196,201, &
     208,210,138,162,180,186,191,192,201,208,210, 93, &
     192,207,208,138,191,207,208,192,199,208, 93,192, &
     199, 62,199,208, 63,167,208, 90,179,208, 50,154, &
     198,205,207,208,210, 13, 86,198,199,207,208,211, &
     117,181,186,198,202,207,208,210,152,179,207, 37, &
     129,150,152,186,192,198,202,207,208,210,124,190, &
     201,202,207,  4, 85,136,186,190,202,207,208,209, &
     124,186,198,205,209,  4,  2, 18,105,165,174,186, &
     202,207,208,105,174,202,152,180,209,165,202,207, &
     208,183,202,205,207,160,165,202,208,209,160,183, &
     202,205,209, 14,151,189,207,175,194,207, 60,185, &
     196,207, 20,183,190,207,208,  2,105,154,190,202, &
     210,167,191,205,208,210,179,186,192,205,208,210, &
     154,167,191,205,154,179,190,191,205,122,144,150, &
     151,152,175,186,194,196,198,202,205,207,208,210, &
     134,150,183,186,192,194,198,202,205,207,208,130, &
     150,183,186,196,198,202,205,207,208, 15,151,193, &
     209,170,196,209, 60,117,160,185,196,202,208,209 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_3 = (/ &
     186,199,208,210,211,181,186,205,208,210, 13,186, &
     210,211, 13,181,186,210,121,201,203,121,193,200, &
     207, 91,171,180,207, 62,192,199,207, 63,167,191, &
     207, 64,140,176,207, 95,191,197,207, 86,207,211, &
      90,179,190,207,  6,112,188,189,207,  6,103,188, &
     189,207,  6,113,188,189,207,  6, 39, 40,112,178, &
     207, 39, 40,103,  6, 36,113,178,207,  6, 39,157, &
     207, 40,157,207, 36,157,207,  2,102,105,157,165, &
     174,183,186,190,202,207,208,  2,102,105,157,165, &
     174,183,186,190,201,202,206,207,208,107,111,178, &
     207,104,175,203,207,108,185,207,  2,108,190,117, &
     181,207,117,173,207,  2,173,190,205,207,210,154, &
     173,203,205,  2,138,173,186,190,207,208,210,  2, &
     173,190,207,  2,173,190,207,208,  2,173,190,201, &
     206,207,160,173,206, 50,205,207, 42,160,199,209, &
     125,130,174,183,186,188,198,202,205,207,208,205, &
     210,186,205,208,154,186,205,210,140,167,176,191, &
     192,197,199,203,205,208,210,186,187,210,182,192, &
     210,  2,132,186,188,189,194,196,205,208,210,109, &
     111,165,174,178,183,190,191,202,205,208,210,174, &
     175,183,186,205,208,210,183,185,186,190,202,205, &
     208,210,140,176,205,208,210,186,191,192,195,197, &
     201,205,210,  2,170,171,183,186,201,202,205,208, &
     210,184,186,188,193,194,196,201,205,208,210,180, &
     186,192,201,205,210,154,197,203,205, 20,154,183, &
     187,205,154,182,203,205,154,189,203,205,154,178, &
     203,205,154,175,203,205,154,185,203,205,154,191, &
     195,201,205,154,170,191,201,205,154,191,193,201, &
     205,154,180,191,201,205,140,154,176,205,192,199, &
     205,208,210,154,192,199,205,199,205,210,211,181 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_4 = (/ &
     186,210,  2,105,147,155,160,168,171,186,198,202, &
     207,208,  2, 93,119,160,162,165,171,174,177,186, &
     190,198,201,205,207,178,188,207,109,111,165,174, &
     178,183,190,191,201,202,206,208,160,178,206,107, &
     174,178,183,207,208, 36,166,177,201,207, 39, 40, &
     147,172,201,207,  3,105,119,155,166,168,171,174, &
     186,190,201,206,208,116,119,155,166,168,171,174, &
     186,190,207,208,  3,155,168,172,174,186,190,201, &
     206,208,116,155,168,172,174,186,190,201,207,208, &
     116,166,172,195,207, 10,105,155,183,186,207,209, &
     133,168,207,  2,105,133,154,183,186,190,201,206, &
     209,  2,105,133,154,183,186,190,201,207,208,209, &
      30,133,201, 30,133,201,111,190,202,203,207,208, &
     132,165,174,183,190,201,206,208,132,160,206, 95, &
     132,165,174,183,190,207,208,109,131,207,  2,131, &
     191,201,206,208,131,160,206,  2, 95,131,191,207, &
     208,  2,109,198,203,207,208,  2,119,186,201,207, &
      20,171,183,201,207,150,186,202,150,186,201,206, &
     150,186,201,209, 89,150,186,105,150,144,196,202, &
     144,196,201,206,144,196,201,209,108,144, 89,144, &
     196,122,194,202,122,194,201,206,122,194,201,209, &
      89,122,194,130,183,202,130,183,201,206,130,183, &
     201,209, 89,130,183,134,183,202,134,183,201,206, &
     134,183,201,209,134,205,210, 89,134,183,129,192, &
     202,129,192,201,206,129,192,201,209, 89,129,192, &
     129,154,125,174,202,125,174,201,206,125,174,201, &
     209, 89,125,174,125,190,102,183,186,202,205,207, &
     208,  2, 94,106,165,183,186,202,205,207,101,165, &
     183,201,206,207,106,165,183,201,206,207, 13,101, &
     208, 13,106,208, 13,101,202,207, 28,101,192,202 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_5 = (/ &
     205,208,210, 85,201,205,209,210,191,199,202,208, &
     140,205,210,140,202,210,199,203,205,210,211,162, &
     174,186,202,207,208,165,202,208, 75,165,202,165, &
     186,202,183,202,205,208,152,194,202,186,194,202, &
     205,208,194,210,211,186,196,202,205,208,186,190, &
     205,208,121,191,201,207,208, 91,191,201,207,208, &
      62,192,207,208, 63,191,207,208, 64,140,207,208, &
      95,191,207,208, 90,186,192,207,208, 86,192,207, &
     208,  6,112,186,188,194,196,207,208,  6,103,186, &
     188,194,196,207,208,  6,113,186,188,194,196,207, &
     208, 75,107,174,183,190,202,207,208,116,191,201, &
     207,208,104,174,183,186,205,207,208,108,186,190, &
     202,207,208,117,186,205,207,140,167,176,191,192, &
     199,200,201,203,208,210, 50,207,210,168,183,186, &
     190,201,202,208,155,174,201,205,147,188,201,208, &
     177,188,201,208,171,186,201,202,210, 98,186,205, &
     207,  2, 60,136,186,201,205,209,119,186,201,202, &
     208, 28,165,183,207, 94,174,183,190,202,205,207, &
     208,165,174,183,184,186,190,201,208, 26, 38,198, &
     164,206, 33, 32, 34, 17, 21, 33, 48,114,207,208, &
      16, 22, 32, 43,126,207,208, 17, 34,141,145,146, &
     207, 81,114,206, 70,114,208, 18, 23,114,115,165, &
     208, 18, 23,114,115,165,201,206,208, 18, 23,114, &
     115,165,201,208,209, 48, 49,207, 48, 49,160,209, &
      78,126,206, 73,126,208, 18, 23,126,127,165,208, &
      20, 23,115,126,183,208, 18, 23,126,127,165,201, &
     206,208, 20, 23,115,126,183,201,206,208, 18, 23, &
     126,127,165,201,208,209, 20, 23,115,126,183,201, &
     208,209, 43, 44,207, 43, 44,160,209,110,141,206, &
     100,141,208, 18, 23,118,141,165,208, 18, 23,118 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_6 = (/ &
     141,165,201,206,208, 18, 23,118,141,165,201,208, &
     209,110,145,206,100,145,208, 18, 23,118,145,165, &
     208, 18, 23,115,145,165,201,206,208, 18, 23,115, &
     145,165,201,208,209,110,146,206,100,146,208, 18, &
      23,118,146,165,208, 20, 23,127,146,183,201,206, &
     208, 20, 23,127,146,183,201,208,209, 18, 23, 81, &
     115,165,201,207, 18, 23, 81,115,165,201,208, 18, &
      23, 70,115,165, 18, 23, 70,115,165,207,208,115, &
     199,207, 47,115,207,208,115,199,208, 47,115,208, &
      49, 79,201, 18, 23, 78,127,165,201,207, 18, 23, &
      78,127,165,201,208, 18, 23, 73,127,165, 18, 23, &
      73,127,165,207,208,127,159,207, 47,127,207,210, &
     127,159,208, 47,127,208,210, 44, 80,201, 20, 23, &
     110,127,183,201,207, 20, 23,110,127,183,201,208, &
      20, 23,100,127,183, 20, 23,100,127,183,207,208, &
     118,158,207, 47,118,199,207,118,158,208, 47,118, &
     199,208, 53,153,207, 53,205, 47,142,207, 79,120, &
     201,207, 79,120,160,201,209, 45,159,143,159, 67, &
     159,206, 56,159,208,143,159,208,143,159,201,206, &
     208,143,159,201,208,209, 80, 84,201,207, 80, 84, &
     160,201,209, 92,158,206,158,192,199, 99,158,208, &
      82,158,208, 99,158,201,206,208,158,192,199,201, &
     206,158,192,199,201,209, 99,158,201,208,209, 52, &
     153,206, 77,153,208,153,186,192,208,153,186,192, &
     201,206,208,153,186,192,201,208,209, 57,142,206, &
      69,142,208,142,174,208,142,174,201,206,208,142, &
     174,201,208,209,142,186,201,208,209,142,186,201, &
     206,208,142,186,208,120,158,207,120,187,192,208, &
      84,161,207, 84,143,187,208, 45,153,207, 45,143, &
     207,208,143,149,207,143,199,202,208,143,149,160 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_7 = (/ &
     209, 67,143,201,207, 67,143,201,208, 56,143, 56, &
     143,207,208, 92, 99,201,207, 92,192,199,201, 92, &
      99,201,208, 82, 99, 82,192,199,207, 82, 99,207, &
     208, 99,135,207, 99,199,205, 52,190,201,207, 77, &
     190, 77,186,192,207,208, 57,174,201,207, 69,174, &
      69,186,207,208,149,199, 83,149,201, 54,149,208, &
     149,199,201,206,149,199,201,209,137,161, 68,161, &
     206, 55,161,208,137,161,201,206,137,161,201,209, &
      74,135,208,135,192,205,135,192,201,205,206,135, &
     192,201,205,209, 83,149,201, 83,192,201,202,207, &
      54,199,207, 54,149,207, 71,137,206, 96,137,208, &
     120,137,208,120,137,201,206,208,120,137,201,208, &
     209, 68,139,201, 68, 88,201,207, 55,137,207, 55, &
      88, 74,159,207, 24, 53, 74, 71,120,201,207, 96, &
     120, 96,143,192,207,208, 71,139,206, 96,139,208, &
     139,143,192,208,139,143,192,201,206,208,139,143, &
     192,201,208,209, 88,148,207, 88,159,205, 76,148, &
     208,148,149,192,148,149,192,201,206,148,149,192, &
     201,209, 76,158,207, 46, 76, 46,128,207, 46,187, &
     205, 51,128,206, 72,128,208,128,192,201,208,209, &
     128,192,201,206,208,128,192,208, 51, 97,201,207, &
      72, 97, 72,192,207,208, 24, 53, 97,207,208, 97, &
     192,205,208,167,140,154,192, 41,187, 98,176,  1, &
      42, 27, 19,186,150,129,202,  2,  3, 28,111,101, &
     132, 93,119,199, 62,125,174,165, 89,190,102,188, &
     178,105, 35,160, 65,208, 94,106,107, 39, 40, 36, &
     157,  4, 60,193,121,136,184,  5,169,163,156,116, &
     151,147,172,177,166,182,  6,196,168,133,144,170, &
     117,173, 50,  7,  8,205,203,134,183,130,109,131, &
     210, 61, 58,185,108,194,155,122, 29,181,206,201 /)
  INTEGER, PARAMETER, DIMENSION(108) :: IROW_STOICM_8 = (/ &
     209,124, 25,198,207, 85, 30,  9,179, 90, 31,180, &
     152, 91,171, 10,195,200,197, 95, 63, 64,191,211, &
     189,112,103,113,138, 86,175,104, 37, 11, 75, 12, &
     162, 87, 13, 26, 38,164,204, 66, 59,123, 32, 33, &
      34,153, 76, 96, 51,141, 67,149,158,135, 68,145, &
      43, 77, 92, 78, 45,114, 97,120, 46, 52,161, 69, &
      70,126,148, 71,137, 47,128, 72, 48, 79, 80,159, &
     118,127, 99, 53, 81, 44, 49,110, 82,139,115, 54, &
      73,143,146,100, 83, 88, 55, 84,142, 74, 56, 57 /)
  INTEGER, PARAMETER, DIMENSION(2988) :: IROW_STOICM = (/&
    IROW_STOICM_0, IROW_STOICM_1, IROW_STOICM_2, IROW_STOICM_3, IROW_STOICM_4, &
    IROW_STOICM_5, IROW_STOICM_6, IROW_STOICM_7, IROW_STOICM_8 /)

  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_0 = (/ &
       1,  1,  2,  2,  3,  3,  3,  4,  4,  4,  5,  5, &
       5,  6,  6,  7,  7,  7,  8,  8,  8,  9,  9, 10, &
      10, 10, 11, 11, 12, 12, 12, 13, 13, 14, 14, 14, &
      15, 15, 15, 16, 16, 16, 17, 17, 17, 18, 18, 19, &
      19, 20, 20, 20, 21, 21, 21, 22, 22, 22, 22, 23, &
      23, 23, 23, 24, 24, 24, 25, 25, 25, 26, 26, 26, &
      26, 27, 27, 27, 28, 28, 28, 29, 29, 30, 30, 31, &
      31, 32, 32, 32, 33, 33, 34, 34, 34, 35, 35, 35, &
      36, 36, 36, 37, 37, 38, 38, 38, 39, 39, 39, 39, &
      39, 40, 40, 40, 41, 41, 41, 42, 42, 42, 43, 43, &
      43, 43, 43, 44, 44, 44, 45, 45, 45, 46, 46, 46, &
      47, 47, 47, 48, 48, 48, 49, 49, 49, 50, 50, 51, &
      51, 51, 51, 51, 52, 52, 52, 52, 52, 53, 53, 53, &
      53, 54, 54, 54, 54, 55, 55, 55, 55, 56, 56, 56, &
      56, 57, 57, 57, 57, 58, 58, 58, 58, 59, 59, 59, &
      60, 60, 60, 61, 61, 61, 61, 61, 62, 62, 62, 63, &
      63, 63, 64, 64, 64, 65, 65, 65, 65, 65, 65, 66, &
      66, 66, 66, 66, 67, 67, 67, 68, 68, 68, 69, 69, &
      69, 70, 70, 71, 71, 71, 71, 72, 72, 72, 72, 72, &
      73, 73, 73, 73, 74, 74, 74, 74, 75, 75, 75, 75, &
      76, 76, 76, 77, 77, 77, 78, 78, 78, 78, 79, 79, &
      79, 80, 80, 80, 80, 80, 80, 80, 81, 81, 81, 81, &
      81, 81, 81, 81, 81, 81, 82, 82, 82, 82, 82, 82, &
      82, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, &
      83, 83, 83, 84, 84, 84, 84, 84, 84, 84, 84, 84, &
      84, 84, 85, 85, 85, 85, 85, 85, 85, 85, 85, 86, &
      86, 86, 86, 86, 86, 86, 86, 86, 87, 87, 87, 87, &
      87, 87, 87, 88, 88, 88, 88, 88, 88, 88, 88, 88, &
      88, 89, 89, 89, 89, 89, 90, 90, 90, 90, 91, 91, &
      91, 91, 91, 92, 92, 92, 92, 93, 93, 93, 94, 94 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_1 = (/ &
      94, 95, 95, 95, 95, 96, 96, 96, 96, 96, 96, 97, &
      97, 97, 97, 98, 98, 98, 99, 99, 99,100,100,100, &
     100,100,101,101,101,102,102,102,102,102,103,103, &
     103,104,104,104,105,105,105,105,105,106,106,106, &
     106,106,106,107,107,107,108,108,108,108,108,108, &
     108,108,108,108,108,108,109,109,109,110,110,110, &
     110,110,110,111,111,111,111,111,112,112,112,112, &
     112,112,113,113,113,113,113,113,113,113,113,113, &
     113,114,114,114,115,115,115,115,115,115,115,115, &
     115,116,116,116,116,116,116,116,116,116,117,117, &
     117,117,118,118,118,118,118,118,118,118,119,119, &
     119,119,119,120,120,120,120,120,120,120,120,120, &
     121,121,121,121,121,121,121,121,121,122,122,122, &
     122,122,123,123,123,123,123,123,123,124,124,124, &
     124,124,124,124,125,125,125,125,126,126,126,126, &
     126,126,126,127,127,127,127,127,127,128,128,128, &
     128,128,128,129,129,129,129,130,130,130,130,130, &
     130,130,130,130,131,131,131,131,131,131,131,131, &
     132,132,132,132,133,133,133,133,133,133,134,134, &
     134,134,135,135,135,135,135,135,135,135,136,136, &
     136,136,136,136,136,136,136,137,137,137,137,137, &
     138,138,138,138,139,139,139,140,140,140,140,141, &
     141,141,142,142,142,143,143,143,144,144,144,145, &
     145,145,146,146,146,147,147,147,148,148,148,148, &
     149,149,149,149,149,149,149,149,150,150,150,150, &
     151,151,151,152,152,152,152,152,152,152,153,153, &
     153,153,153,153,153,153,153,154,154,154,155,155, &
     155,156,156,156,156,156,156,157,157,157,157,157, &
     157,158,158,158,158,158,158,158,158,158,159,159, &
     159,159,159,159,159,159,159,159,160,160,160,161 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_2 = (/ &
     161,161,161,161,161,161,161,161,162,162,162,163, &
     163,163,164,164,164,165,165,165,166,166,166,166, &
     166,166,166,167,167,167,167,168,168,168,168,168, &
     168,168,168,168,168,168,168,168,169,169,169,169, &
     169,169,169,169,169,169,170,170,170,170,170,170, &
     170,170,170,171,171,171,171,171,171,171,171,171, &
     172,172,172,172,172,172,172,172,172,173,173,173, &
     173,173,173,173,173,174,174,174,174,174,174,174, &
     174,174,174,174,174,175,175,175,175,175,175,175, &
     175,175,175,176,176,176,176,176,176,176,176,177, &
     177,177,177,177,177,177,177,177,178,178,178,178, &
     178,178,178,179,179,179,179,179,179,179,179,179, &
     179,179,180,180,180,180,180,180,180,180,180,181, &
     181,181,181,182,182,182,182,183,183,183,184,184, &
     184,185,185,185,186,186,186,187,187,187,188,188, &
     188,188,188,188,188,189,189,189,189,189,189,189, &
     190,190,190,190,190,190,190,190,191,191,191,192, &
     192,192,192,192,192,192,192,192,192,192,193,193, &
     193,193,193,194,194,194,194,194,194,194,194,194, &
     195,195,195,195,195,196,197,197,197,197,197,197, &
     197,197,197,198,198,198,199,199,199,200,200,200, &
     200,201,201,201,201,202,202,202,202,202,203,203, &
     203,203,203,204,204,204,204,205,205,205,206,206, &
     206,206,207,207,207,207,207,208,208,208,208,208, &
     208,209,209,209,209,209,210,210,210,210,210,210, &
     211,211,211,211,212,212,212,212,212,213,213,213, &
     213,213,213,213,213,213,213,213,213,213,213,213, &
     214,214,214,214,214,214,214,214,214,214,214,215, &
     215,215,215,215,215,215,215,215,215,216,216,216, &
     216,217,217,217,218,218,218,218,218,218,218,218 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_3 = (/ &
     219,219,219,219,219,220,220,220,220,220,221,221, &
     221,221,222,222,222,222,223,223,223,224,224,224, &
     224,225,225,225,225,226,226,226,226,227,227,227, &
     227,228,228,228,228,229,229,229,229,230,230,230, &
     231,231,231,231,232,232,232,232,232,233,233,233, &
     233,233,234,234,234,234,234,235,235,235,235,235, &
     235,236,236,236,237,237,237,237,237,238,239,239, &
     239,240,240,240,241,241,241,242,242,242,242,242, &
     242,242,242,242,242,242,242,243,243,243,243,243, &
     243,243,243,243,243,243,243,243,243,244,244,244, &
     244,245,245,245,245,246,246,246,247,247,247,248, &
     248,248,249,249,249,250,250,250,250,250,250,251, &
     251,251,251,252,252,252,252,252,252,252,252,253, &
     253,253,253,254,254,254,254,254,255,255,255,255, &
     255,255,256,256,256,257,257,257,258,258,258,258, &
     259,259,259,259,259,259,259,259,259,259,259,260, &
     260,261,261,261,262,262,262,262,263,263,263,263, &
     263,263,263,263,263,263,263,264,264,264,265,265, &
     265,266,266,266,266,266,266,266,266,266,266,267, &
     267,267,267,267,267,267,267,267,267,267,267,268, &
     268,268,268,268,268,268,269,269,269,269,269,269, &
     269,269,270,270,270,270,270,271,271,271,271,271, &
     271,271,271,272,272,272,272,272,272,272,272,272, &
     272,273,273,273,273,273,273,273,273,273,273,274, &
     274,274,274,274,274,275,275,275,275,276,276,276, &
     276,276,277,277,277,277,278,278,278,278,279,279, &
     279,279,280,280,280,280,281,281,281,281,282,282, &
     282,282,282,283,283,283,283,283,284,284,284,284, &
     284,285,285,285,285,285,286,286,286,286,287,287, &
     287,287,287,288,288,288,288,289,289,289,289,290 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_4 = (/ &
     290,290,291,291,291,291,291,291,291,291,291,291, &
     291,291,292,292,292,292,292,292,292,292,292,292, &
     292,292,292,292,292,293,293,293,294,294,294,294, &
     294,294,294,294,294,294,294,294,295,295,295,296, &
     296,296,296,296,296,297,297,297,297,297,298,298, &
     298,298,298,298,299,299,299,299,299,299,299,299, &
     299,299,299,299,299,300,300,300,300,300,300,300, &
     300,300,300,300,301,301,301,301,301,301,301,301, &
     301,301,302,302,302,302,302,302,302,302,302,302, &
     303,303,303,303,303,304,304,304,304,304,304,304, &
     305,305,305,306,306,306,306,306,306,306,306,306, &
     306,307,307,307,307,307,307,307,307,307,307,307, &
     308,308,308,309,309,309,310,310,310,310,310,310, &
     311,311,311,311,311,311,311,311,312,312,312,313, &
     313,313,313,313,313,313,313,314,314,314,315,315, &
     315,315,315,315,316,316,316,317,317,317,317,317, &
     317,318,318,318,318,318,318,319,319,319,319,319, &
     320,320,320,320,320,321,321,321,322,322,322,322, &
     323,323,323,323,324,324,324,325,325,326,326,326, &
     327,327,327,327,328,328,328,328,329,329,330,330, &
     330,331,331,331,332,332,332,332,333,333,333,333, &
     334,334,334,335,335,335,336,336,336,336,337,337, &
     337,337,338,338,338,339,339,339,340,340,340,340, &
     341,341,341,341,342,342,342,343,343,343,344,344, &
     344,345,345,345,345,346,346,346,346,347,347,347, &
     348,348,349,349,349,350,350,350,350,351,351,351, &
     351,352,352,352,353,353,354,354,354,354,354,354, &
     354,355,355,355,355,355,355,355,355,355,356,356, &
     356,356,356,356,357,357,357,357,357,357,358,358, &
     358,359,359,359,360,360,360,360,361,361,362,362 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_5 = (/ &
     362,362,362,363,363,363,363,363,364,364,364,364, &
     365,365,365,366,366,366,367,367,367,367,367,368, &
     368,368,368,368,368,369,369,369,370,370,370,371, &
     371,371,372,372,372,372,373,373,373,374,374,374, &
     374,374,375,375,375,376,376,376,376,376,377,377, &
     377,377,378,378,378,378,378,379,379,379,379,379, &
     380,380,380,380,381,381,381,381,382,382,382,382, &
     383,383,383,383,384,384,384,384,384,385,385,385, &
     385,386,386,386,386,386,386,386,386,387,387,387, &
     387,387,387,387,387,388,388,388,388,388,388,388, &
     388,389,389,389,389,389,389,389,389,390,390,390, &
     390,390,391,391,391,391,391,391,391,392,392,392, &
     392,392,392,393,393,393,393,394,394,394,394,394, &
     394,394,394,394,394,394,395,395,395,396,396,396, &
     396,396,396,396,397,397,397,397,398,398,398,398, &
     399,399,399,399,400,400,400,400,400,401,401,401, &
     401,402,402,402,402,402,402,402,403,403,403,403, &
     403,404,404,404,404,405,405,405,405,405,405,405, &
     405,406,406,406,406,406,406,406,406,407,408,409, &
     410,411,412,413,414,415,415,415,415,415,415,415, &
     416,416,416,416,416,416,416,417,417,417,417,417, &
     417,418,418,418,419,419,419,420,420,420,420,420, &
     420,421,421,421,421,421,421,421,421,422,422,422, &
     422,422,422,422,422,423,423,423,424,424,424,424, &
     425,425,425,426,426,426,427,427,427,427,427,427, &
     428,428,428,428,428,428,429,429,429,429,429,429, &
     429,429,430,430,430,430,430,430,430,430,431,431, &
     431,431,431,431,431,431,432,432,432,432,432,432, &
     432,432,433,433,433,434,434,434,434,435,435,435, &
     436,436,436,437,437,437,437,437,437,438,438,438 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_6 = (/ &
     438,438,438,438,438,439,439,439,439,439,439,439, &
     439,440,440,440,441,441,441,442,442,442,442,442, &
     442,443,443,443,443,443,443,443,443,444,444,444, &
     444,444,444,444,444,445,445,445,446,446,446,447, &
     447,447,447,447,447,448,448,448,448,448,448,448, &
     448,449,449,449,449,449,449,449,449,450,450,450, &
     450,450,450,450,451,451,451,451,451,451,451,452, &
     452,452,452,452,453,453,453,453,453,453,453,454, &
     454,454,455,455,455,455,456,456,456,457,457,457, &
     458,458,458,459,459,459,459,459,459,459,460,460, &
     460,460,460,460,460,461,461,461,461,461,462,462, &
     462,462,462,462,462,463,463,463,464,464,464,464, &
     465,465,465,466,466,466,466,467,467,467,468,468, &
     468,468,468,468,468,469,469,469,469,469,469,469, &
     470,470,470,470,470,471,471,471,471,471,471,471, &
     472,472,472,473,473,473,473,474,474,474,475,475, &
     475,475,476,476,476,477,477,478,478,478,479,479, &
     479,479,480,480,480,480,480,481,481,482,482,483, &
     483,483,484,484,484,485,485,485,486,486,486,486, &
     486,487,487,487,487,487,488,488,488,488,489,489, &
     489,489,489,490,490,490,491,491,491,492,492,492, &
     493,493,493,494,494,494,494,494,495,495,495,495, &
     495,496,496,496,496,496,497,497,497,497,497,498, &
     498,498,499,499,499,500,500,500,500,501,501,501, &
     501,501,501,502,502,502,502,502,502,503,503,503, &
     504,504,504,505,505,505,506,506,506,506,506,507, &
     507,507,507,507,508,508,508,508,508,509,509,509, &
     509,509,510,510,510,511,511,511,512,512,512,512, &
     513,513,513,514,514,514,514,515,515,515,516,516, &
     516,516,517,517,517,518,518,518,518,519,519,519 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_7 = (/ &
     519,520,520,520,520,521,521,521,521,522,522,523, &
     523,523,523,524,524,524,524,525,525,525,525,526, &
     526,526,526,527,527,528,528,528,528,529,529,529, &
     529,530,530,530,531,531,531,532,532,532,532,533, &
     533,534,534,534,534,534,535,535,535,535,536,536, &
     537,537,537,537,538,538,539,539,539,540,540,540, &
     541,541,541,541,542,542,542,542,543,543,544,544, &
     544,545,545,545,546,546,546,546,547,547,547,547, &
     548,548,548,549,549,549,550,550,550,550,550,551, &
     551,551,551,551,552,552,552,553,553,553,553,553, &
     554,554,554,555,555,555,556,556,556,557,557,557, &
     558,558,558,559,559,559,559,559,560,560,560,560, &
     560,561,561,561,562,562,562,562,563,563,563,564, &
     564,565,565,565,566,566,566,567,567,567,567,568, &
     568,569,569,569,569,569,570,570,570,571,571,571, &
     572,572,572,572,573,573,573,573,573,573,574,574, &
     574,574,574,574,575,575,575,576,576,576,577,577, &
     577,578,578,578,579,579,579,579,579,580,580,580, &
     580,580,581,581,581,582,582,583,583,583,584,584, &
     584,585,585,585,586,586,586,587,587,587,587,587, &
     588,588,588,588,588,589,589,589,590,590,590,590, &
     591,591,592,592,592,592,593,593,593,593,593,594, &
     594,594,594,595,596,597,598,599,600,601,602,603, &
     604,605,606,606,607,608,609,610,611,612,613,614, &
     615,616,617,618,619,620,621,622,623,624,625,626, &
     627,628,629,630,631,632,633,634,635,636,637,638, &
     639,640,641,642,643,644,645,646,647,648,649,650, &
     651,652,653,654,655,656,657,658,659,660,661,662, &
     663,664,665,666,667,668,669,670,671,672,673,674, &
     675,676,677,678,679,680,681,682,683,684,685,686 /)
  INTEGER, PARAMETER, DIMENSION(108) :: ICOL_STOICM_8 = (/ &
     687,688,689,690,691,692,693,694,695,696,697,698, &
     699,700,701,702,703,704,705,706,707,708,709,710, &
     711,712,713,714,715,716,717,718,719,720,721,722, &
     723,724,725,726,727,728,729,730,731,732,733,734, &
     735,736,737,738,739,740,741,742,743,744,745,746, &
     747,748,749,750,751,752,753,754,755,756,757,758, &
     759,760,761,762,763,764,765,766,767,768,769,770, &
     771,772,773,774,775,776,777,778,779,780,781,782, &
     783,784,785,786,787,788,789,790,791,792,793,794 /)
  INTEGER, PARAMETER, DIMENSION(2988) :: ICOL_STOICM = (/&
    ICOL_STOICM_0, ICOL_STOICM_1, ICOL_STOICM_2, ICOL_STOICM_3, ICOL_STOICM_4, &
    ICOL_STOICM_5, ICOL_STOICM_6, ICOL_STOICM_7, ICOL_STOICM_8 /)

  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_0 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  2.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp, &
       -2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       9.500000e-01_dp,  5.000000e-02_dp,  9.500000e-01_dp,  5.000000e-02_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       2.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_1 = (/ &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       -2.000000e+00_dp,  2.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       7.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       1.600000e-01_dp,  9.000000e-02_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  1.600000e-01_dp, &
       7.500000e-01_dp,  3.000000e-02_dp,  9.000000e-02_dp,  7.000000e-02_dp,  1.600000e-01_dp, &
       -1.000000e+00_dp,  1.600000e-01_dp,  3.500000e-01_dp,  -1.000000e+00_dp,  6.400000e-01_dp, &
       9.000000e-02_dp,  2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  2.000000e-01_dp, &
       5.400000e-01_dp,  3.800000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_2 = (/ &
       -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  2.000000e-01_dp,  -1.000000e+00_dp,  3.000000e-01_dp, &
       3.000000e-01_dp,  2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  2.500000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-02_dp,  -1.000000e+00_dp,  5.000000e-02_dp,  9.500000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-02_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.200000e-01_dp, &
       5.000000e-02_dp,  1.800000e-01_dp,  1.400000e-01_dp,  3.200000e-01_dp,  -1.000000e+00_dp, &
       3.200000e-01_dp,  1.000000e+00_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  2.700000e-01_dp, &
       1.900000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.700000e-01_dp, &
       5.700000e-01_dp,  8.600000e-01_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp,  9.300000e-01_dp,  9.300000e-01_dp, &
       -1.000000e+00_dp,  3.000000e-02_dp,  8.100000e-02_dp,  9.000000e-03_dp,  8.200000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_3 = (/ &
       5.800000e-02_dp,  -1.000000e+00_dp,  4.760000e-01_dp,  3.440000e-01_dp,  9.100000e-01_dp, &
       -1.000000e+00_dp,  8.200000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.200000e-01_dp,  5.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-01_dp,  3.500000e-01_dp, &
       8.800000e-01_dp,  5.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-01_dp,  1.500000e-01_dp, &
       1.220000e-01_dp,  -1.000000e+00_dp,  1.220000e-01_dp,  7.280000e-01_dp,  8.500000e-01_dp, &
       7.280000e-01_dp,  -1.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  1.500000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       7.000000e-01_dp,  7.000000e-02_dp,  2.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-02_dp, &
       3.500000e-02_dp,  1.300000e+00_dp,  -1.000000e+00_dp,  8.000000e-01_dp,  7.000000e-01_dp, &
       7.000000e-02_dp,  2.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-02_dp,  3.500000e-02_dp, &
       1.300000e+00_dp,  8.000000e-01_dp,  -1.000000e+00_dp,  6.000000e-01_dp,  4.000000e-01_dp, &
       6.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp,  -1.000000e+00_dp, &
       9.600000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  9.600000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  4.000000e-02_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  4.000000e-02_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  9.400000e-01_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp, &
       -1.000000e+00_dp,  9.400000e-01_dp,  9.000000e-01_dp,  1.880000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  6.600000e-01_dp,  7.500000e-01_dp, &
       7.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  7.000000e-01_dp, &
       3.000000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp, &
       5.000000e-01_dp,  6.550000e-01_dp,  3.450000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  9.190000e-01_dp,  8.940000e-01_dp,  -1.000000e+00_dp, &
       9.340000e-01_dp,  4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  7.000000e-01_dp,  6.600000e-01_dp, &
       7.500000e-01_dp,  1.200000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  1.200000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_4 = (/ &
       7.000000e-02_dp,  2.300000e-01_dp,  -2.000000e+00_dp,  3.500000e-02_dp,  3.500000e-02_dp, &
       3.000000e-01_dp,  8.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       2.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       -1.000000e+00_dp,  7.500000e-01_dp,  7.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.250000e+00_dp,  1.600000e-01_dp, &
       9.000000e-02_dp,  5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       8.500000e-01_dp,  1.500000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.500000e-01_dp, &
       1.500000e-01_dp,  -1.000000e+00_dp,  2.720000e-01_dp,  6.280000e-01_dp,  3.700000e-02_dp, &
       6.300000e-02_dp,  -1.000000e+00_dp,  3.800000e-02_dp,  2.500000e-02_dp,  6.300000e-02_dp, &
       -9.370000e-01_dp,  1.000000e-01_dp,  5.780000e-01_dp,  -1.000000e+00_dp,  1.020000e-01_dp, &
       1.020000e-01_dp,  3.300000e-02_dp,  1.870000e-01_dp,  5.780000e-01_dp,  6.800000e-01_dp, &
       -8.980000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  8.500000e-01_dp, &
       -1.000000e+00_dp,  7.500000e-02_dp,  7.500000e-02_dp,  7.500000e-02_dp,  9.250000e-01_dp, &
       7.500000e-02_dp,  1.500000e-01_dp,  -9.250000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_5 = (/ &
       -1.000000e+00_dp,  2.500000e-01_dp,  1.600000e-01_dp,  2.500000e-01_dp,  3.000000e-02_dp, &
       9.000000e-02_dp,  7.500000e-01_dp,  7.000000e-02_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       1.600000e-01_dp,  3.500000e-01_dp,  6.400000e-01_dp,  -9.100000e-01_dp,  2.500000e-01_dp, &
       2.500000e-01_dp,  9.500000e-01_dp,  5.400000e-01_dp,  3.800000e-01_dp,  -1.000000e+00_dp, &
       1.500000e-01_dp,  1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  2.000000e-01_dp, &
       3.000000e-01_dp,  3.000000e-01_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       -1.000000e+00_dp,  7.500000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  2.400000e-01_dp,  2.400000e-01_dp,  1.220000e+00_dp, &
       3.000000e-01_dp,  -1.000000e+00_dp,  2.800000e-01_dp,  1.800000e-01_dp,  1.100000e+00_dp, &
       -1.000000e+00_dp,  9.000000e-02_dp,  7.500000e-01_dp,  1.110000e+00_dp,  -2.000000e+00_dp, &
       4.500000e-01_dp,  2.900000e-01_dp,  2.900000e-01_dp,  9.100000e-01_dp,  9.000000e-02_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  1.300000e-01_dp,  -1.000000e+00_dp,  2.900000e-01_dp, &
       9.500000e-01_dp,  1.800000e-01_dp,  3.300000e-01_dp,  2.500000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  3.600000e-01_dp,  -1.000000e+00_dp, &
       1.400000e-01_dp,  8.900000e-01_dp,  2.500000e-01_dp,  3.600000e-01_dp,  6.400000e-01_dp, &
       -1.000000e+00_dp,  1.500000e-01_dp,  2.550000e-01_dp,  -1.000000e+00_dp,  1.255000e+00_dp, &
       5.950000e-01_dp,  5.950000e-01_dp,  1.700000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       3.750000e-01_dp,  3.750000e-01_dp,  6.250000e-01_dp,  2.500000e-01_dp,  3.750000e-01_dp, &
       3.750000e-01_dp,  3.750000e-01_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  7.500000e-01_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  6.000000e-01_dp,  7.850000e-01_dp,  1.150000e-01_dp, &
       -1.000000e+00_dp,  1.800000e-02_dp,  1.800000e-02_dp,  1.500000e-01_dp,  9.000000e-01_dp, &
       -1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.250000e+00_dp, &
       2.500000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  -2.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.100000e-01_dp,  1.500000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_6 = (/ &
       1.500000e-01_dp,  -1.000000e+00_dp,  4.400000e-01_dp,  -1.000000e+00_dp,  4.400000e-01_dp, &
       1.500000e-01_dp,  4.100000e-01_dp,  1.500000e-01_dp,  4.400000e-01_dp,  4.400000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  4.100000e-01_dp,  -1.000000e+00_dp,  5.900000e-01_dp, &
       1.500000e-01_dp,  3.900000e-01_dp,  4.400000e-01_dp,  -1.000000e+00_dp,  3.900000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e-01_dp,  1.200000e-01_dp, &
       1.200000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.600000e-01_dp,  3.600000e-01_dp,  2.800000e-01_dp,  2.800000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  7.810000e-01_dp, &
       1.900000e-01_dp,  -1.000000e+00_dp,  1.900000e-01_dp,  3.000000e-02_dp,  3.000000e-02_dp, &
       -1.000000e+00_dp,  1.900000e-01_dp,  8.100000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.610000e-01_dp, &
       1.340000e-01_dp,  1.340000e-01_dp,  1.340000e-01_dp,  -1.000000e+00_dp,  7.320000e-01_dp, &
       5.050000e-01_dp,  -7.730000e-01_dp,  7.730000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  5.300000e-01_dp, &
       4.700000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  6.500000e-01_dp,  3.500000e-01_dp,  -1.000000e+00_dp,  4.400000e-02_dp, &
       4.400000e-02_dp,  1.100000e-01_dp,  -1.000000e+00_dp,  1.020000e-01_dp,  5.400000e-02_dp, &
       4.560000e-01_dp,  2.000000e-01_dp,  3.000000e-01_dp,  -1.000000e+00_dp,  4.950000e-01_dp, &
       1.050000e-01_dp,  2.430000e-01_dp,  2.370000e-01_dp,  5.100000e-02_dp,  1.200000e-01_dp, &
       1.200000e-01_dp,  5.000000e-01_dp,  6.000000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_7 = (/ &
       -1.000000e+00_dp,  5.600000e-01_dp,  2.800000e-01_dp,  3.600000e-01_dp,  2.800000e-01_dp, &
       2.200000e-02_dp,  3.260000e-01_dp,  8.800000e-01_dp,  1.200000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  6.250000e-01_dp,  9.800000e-02_dp,  2.390000e-01_dp,  1.410000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  3.600000e-01_dp,  6.400000e-01_dp,  -3.600000e-01_dp, &
       -1.000000e+00_dp,  7.910000e-01_dp,  2.090000e-01_dp,  -2.090000e-01_dp,  -1.000000e+00_dp, &
       6.400000e-01_dp,  3.600000e-01_dp,  -3.600000e-01_dp,  -1.000000e+00_dp,  3.600000e-01_dp, &
       6.400000e-01_dp,  -3.600000e-01_dp,  -1.000000e+00_dp,  7.910000e-01_dp,  2.090000e-01_dp, &
       -2.090000e-01_dp,  -1.000000e+00_dp,  7.910000e-01_dp,  2.090000e-01_dp,  -2.090000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.090000e-01_dp, &
       7.910000e-01_dp,  -2.090000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  2.430000e-01_dp, &
       7.500000e-01_dp,  -8.750000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  5.130000e-01_dp, &
       4.800000e-01_dp,  -7.400000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  7.430000e-01_dp, &
       2.500000e-01_dp,  -6.250000e-01_dp,  7.000000e-03_dp,  5.780000e-01_dp,  2.720000e-01_dp, &
       -1.000000e+00_dp,  1.430000e-01_dp,  -1.500000e-01_dp,  6.800000e-01_dp,  3.200000e-01_dp, &
       -1.000000e+00_dp,  7.000000e-03_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  4.930000e-01_dp, &
       -5.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.172000e+00_dp,  4.400000e-01_dp,  2.780000e-01_dp,  -1.000000e+00_dp, &
       8.500000e-02_dp,  2.500000e-02_dp,  8.500000e-02_dp,  3.750000e-01_dp,  8.500000e-02_dp, &
       6.000000e-01_dp,  1.125000e+00_dp,  -1.750000e-01_dp,  8.580000e-01_dp,  4.730000e-01_dp, &
       1.420000e-01_dp,  -1.000000e+00_dp,  8.800000e-02_dp,  8.800000e-02_dp,  8.800000e-02_dp, &
       3.750000e-01_dp,  1.170000e-01_dp,  1.000000e+00_dp,  6.780000e-01_dp,  -1.000000e+00_dp, &
       1.250000e-01_dp,  8.250000e-01_dp,  -1.000000e+00_dp,  6.540000e-01_dp,  3.460000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_8 = (/ &
       -3.460000e-01_dp,  -1.000000e+00_dp,  2.090000e-01_dp,  7.910000e-01_dp,  -2.090000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  3.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  7.000000e-01_dp,  7.000000e-01_dp,  7.000000e-01_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.500000e-02_dp,  5.500000e-02_dp,  5.000000e-01_dp,  5.000000e-01_dp,  4.450000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  8.900000e-01_dp,  4.450000e-01_dp,  8.900000e-01_dp, &
       4.450000e-01_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       3.200000e-01_dp,  5.000000e-02_dp,  1.800000e-01_dp,  1.300000e-01_dp,  3.200000e-01_dp, &
       -1.000000e+00_dp,  3.200000e-01_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  2.700000e-01_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.130000e-01_dp,  7.470000e-01_dp, &
       1.400000e-01_dp,  -1.000000e+00_dp,  4.530000e-01_dp,  2.940000e-01_dp,  -1.000000e+00_dp, &
       8.870000e-01_dp,  1.000000e+00_dp,  1.700000e-01_dp,  2.900000e-01_dp,  2.160000e-01_dp, &
       2.340000e-01_dp,  -1.000000e+00_dp,  2.340000e-01_dp,  2.160000e-01_dp,  9.000000e-02_dp, &
       9.000000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  4.000000e-01_dp,  4.000000e-01_dp,  -4.000000e-01_dp,  4.000000e-01_dp, &
       1.000000e+00_dp,  1.430000e-01_dp,  -1.000000e+00_dp,  1.430000e-01_dp,  8.570000e-01_dp, &
       8.570000e-01_dp,  -1.000000e+00_dp,  8.500000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  3.900000e-01_dp, &
       5.700000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  3.000000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_9 = (/ &
       5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  7.000000e-01_dp,  7.000000e-02_dp,  2.300000e-01_dp, &
       -1.000000e+00_dp,  3.500000e-02_dp,  3.500000e-02_dp,  3.000000e-01_dp,  -1.000000e+00_dp, &
       8.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  3.600000e-01_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       2.100000e-01_dp,  4.100000e-01_dp,  3.200000e-01_dp,  4.200000e-01_dp,  6.200000e-01_dp, &
       -1.000000e+00_dp,  2.100000e-01_dp,  5.000000e-02_dp,  5.000000e-02_dp,  6.300000e-01_dp, &
       9.000000e-02_dp,  2.600000e-01_dp,  3.000000e-01_dp,  2.400000e-01_dp,  6.000000e-02_dp, &
       3.800000e-01_dp,  2.400000e-01_dp,  -1.000000e+00_dp,  2.000000e-01_dp,  4.200000e-01_dp, &
       -1.000000e+00_dp,  6.000000e-02_dp,  1.000000e-01_dp,  3.700000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.700000e-01_dp,  2.900000e-01_dp,  2.160000e-01_dp, &
       2.340000e-01_dp,  -1.000000e+00_dp,  2.340000e-01_dp,  2.160000e-01_dp,  9.000000e-02_dp, &
       1.000000e+00_dp,  9.000000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e-01_dp,  9.000000e-01_dp,  -1.000000e+00_dp, &
       9.000000e-01_dp,  9.000000e-01_dp,  -1.000000e-01_dp,  1.000000e-01_dp,  9.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e-01_dp,  -1.000000e+00_dp,  6.700000e-02_dp,  3.300000e-02_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_10 = (/ &
       -1.000000e+00_dp,  9.000000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp,  2.700000e-01_dp, &
       5.700000e-02_dp,  2.100000e-01_dp,  7.500000e-02_dp,  -9.430000e-01_dp,  1.900000e-02_dp, &
       3.000000e-01_dp,  3.000000e-01_dp,  1.500000e-01_dp,  2.700000e-01_dp,  7.900000e-01_dp, &
       -1.000000e+00_dp,  6.100000e-01_dp,  5.000000e-01_dp,  2.000000e-01_dp,  6.000000e-02_dp, &
       -1.000000e+00_dp,  1.000000e-02_dp,  2.300000e-01_dp,  2.300000e-01_dp,  7.000000e-02_dp, &
       2.000000e-01_dp,  5.000000e-01_dp,  -5.000000e-01_dp,  2.100000e-01_dp,  2.600000e-01_dp, &
       4.400000e-01_dp,  -1.000000e+00_dp,  9.000000e-02_dp,  7.000000e-01_dp,  9.000000e-02_dp, &
       8.800000e-01_dp,  -1.000000e+00_dp,  6.900000e-01_dp,  5.100000e-01_dp,  1.600000e-01_dp, &
       2.800000e-01_dp,  -1.000000e+00_dp,  6.000000e-02_dp,  4.400000e-01_dp,  6.000000e-02_dp, &
       6.000000e-02_dp,  5.000000e-01_dp,  -5.600000e-01_dp,  -1.000000e+00_dp,  1.930000e-01_dp, &
       1.930000e-01_dp,  6.120000e-01_dp,  -3.880000e-01_dp,  3.500000e-01_dp,  6.500000e-01_dp, &
       -1.000000e+00_dp,  6.500000e-01_dp,  3.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       -1.000000e+00_dp,  8.000000e-02_dp,  7.000000e-02_dp,  8.000000e-02_dp,  8.500000e-01_dp, &
       1.850000e+00_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       -1.000000e+00_dp,  8.000000e-02_dp,  7.000000e-02_dp,  8.000000e-02_dp,  8.500000e-01_dp, &
       8.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  1.500000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  4.800000e-01_dp,  5.200000e-01_dp,  5.200000e-01_dp, &
       4.800000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  7.200000e-02_dp, &
       7.800000e-02_dp,  7.800000e-02_dp,  7.200000e-02_dp,  1.500000e-01_dp,  -8.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  -5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_11 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       8.500000e-02_dp,  -1.000000e+00_dp,  3.650000e-01_dp,  8.500000e-02_dp,  5.500000e-01_dp, &
       5.500000e-01_dp,  5.500000e-01_dp,  8.500000e-02_dp,  -3.650000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  8.800000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_12 = (/ &
       1.200000e-01_dp,  1.000000e+00_dp,  8.800000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp, &
       7.000000e-01_dp,  3.000000e-01_dp,  3.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp, &
       8.500000e-01_dp,  1.500000e-01_dp,  1.500000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp, &
       9.000000e-01_dp,  1.000000e+00_dp,  7.000000e-02_dp,  1.730000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-03_dp,  -1.000000e+00_dp,  7.100000e-01_dp, &
       2.750000e-01_dp,  4.250000e-01_dp,  2.850000e-01_dp,  9.850000e-01_dp,  9.850000e-01_dp, &
       5.000000e-03_dp,  -1.000000e+00_dp,  7.100000e-01_dp,  2.750000e-01_dp,  4.250000e-01_dp, &
       2.850000e-01_dp,  9.850000e-01_dp,  9.850000e-01_dp,  5.000000e-03_dp,  -1.000000e+00_dp, &
       7.100000e-01_dp,  2.750000e-01_dp,  4.250000e-01_dp,  2.850000e-01_dp,  9.850000e-01_dp, &
       9.850000e-01_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  2.600000e-01_dp,  5.800000e-01_dp, &
       3.600000e-01_dp,  6.700000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       7.000000e-01_dp,  3.000000e-01_dp,  3.000000e-01_dp,  7.000000e-01_dp,  1.000000e+00_dp, &
       3.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_13 = (/ &
       1.000000e+00_dp,  3.200000e-01_dp,  5.000000e-02_dp,  1.800000e-01_dp,  1.300000e-01_dp, &
       3.200000e-01_dp,  3.200000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.900000e-01_dp, &
       2.700000e-01_dp,  1.800000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-01_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  4.000000e-01_dp,  6.000000e-01_dp,  4.000000e-01_dp,  4.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       1.100000e-01_dp,  5.000000e-01_dp,  3.900000e-01_dp,  1.890000e+00_dp,  1.100000e-01_dp, &
       2.000000e+00_dp,  8.900000e-01_dp,  2.500000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  5.300000e-01_dp, &
       -1.000000e+00_dp,  5.300000e-01_dp,  4.700000e-01_dp,  -1.000000e+00_dp,  5.300000e-01_dp, &
       1.000000e+00_dp,  1.800000e-01_dp,  -1.000000e+00_dp,  1.800000e-01_dp,  8.200000e-01_dp, &
       -1.000000e+00_dp,  1.800000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  7.000000e-01_dp, &
       1.000000e-01_dp,  2.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_14 = (/ &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_15 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_16 = (/ &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_17 = (/ &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_18 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(138) :: STOICM_19 = (/ &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(2988) :: STOICM = (/&
    STOICM_0, STOICM_1, STOICM_2, STOICM_3, STOICM_4, &
    STOICM_5, STOICM_6, STOICM_7, STOICM_8, STOICM_9, &
    STOICM_10, STOICM_11, STOICM_12, STOICM_13, STOICM_14, &
    STOICM_15, STOICM_16, STOICM_17, STOICM_18, STOICM_19 /)


END MODULE aromatics_kpp_StoichiomSP

